Aminet 30/Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso/Aminet/dev/cross/GBDK-2.0.lha/GBDK/lib/isupper.c

C/C++ Source or Header | 1998-10-01 | 107b | 10 lines

#include <ctype.h>

BYTE isupper(char c)
{
  if(c >= 'A' && c <= 'Z')
    return 1;
  else
    return 0;
}